object MDIChild: TMDIChild Left = 198 Top = 150 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderStyle = bsNone Caption = 'Untitled' ClientHeight = 237 ClientWidth = 524 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] FormStyle = fsMDIChild Menu = MainMenu1 Position = poDefault Visible = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnMouseDown = FormMouseDown OnResize = FormResize PixelsPerInch = 96 TextHeight = 16 object Editor: THTMLEditor Left = 0 Top = 0 Width = 524 Height = 237 Cursor = crIBeam BackupExt = 'BAK' CaretOvr.Shape = csBlock FixedFont.Color = clWindowText FixedFont.Name = 'Fixedsys' FixedFont.Size = 10 FixedFont.Style = [] HideSelection = False HighlightColors.BackColor = clHighlight HighlightColors.TextColor = clHighlightText ScrollBarsAlways = True WantTab = True OnShowStatus = EditorShowStatus OnUserCommand = UserCommandHandler Align = alClient Controller = OvcController1 ParentColor = False TabOrder = 0 TabStop = True end object SaveDialog: TSaveDialog HelpContext = 7 DefaultExt = 'HTM' FileEditStyle = fsEdit Filter = 'HTML files (*.htm)|*.htm|HTML 3 files (*.ht3)|*.ht3|Text files (' + '*.txt)|*.txt|HTMLed Template|*.htt|All files (*.*)|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp] Left = 312 Top = 72 end object MainMenu1: TMainMenu Left = 342 Top = 116 object Edit1: TMenuItem Caption = '&Edit' GroupIndex = 1 ShortCut = 0 object Undo1: TMenuItem Caption = '&Undo' Hint = 'Undo the last operation' ShortCut = 16474 OnClick = Undo1Click end object Redo1: TMenuItem Caption = 'Red&o' ShortCut = 0 OnClick = Redo1Click end object RepeatLastMarkup1: TMenuItem Caption = '&Repeat Last Markup' Hint = 'Repeat the last markup command' ShortCut = 16473 OnClick = RepeatLastMarkup1Click end object N20: TMenuItem Caption = '-' ShortCut = 0 end object Cut1: TMenuItem Caption = 'Cu&t' Hint = 'Cut to clipboard' ShortCut = 16472 OnClick = Cut1Click end object Copy1: TMenuItem Caption = '&Copy' Hint = 'Copy to clipboard' ShortCut = 16451 OnClick = Copy1Click end object Paste1: TMenuItem Caption = '&Paste' Hint = 'Paste from clipboard' ShortCut = 16470 OnClick = Paste1Click end object HiddenCut1: TMenuItem Caption = 'HiddenCut' ShortCut = 8238 Visible = False OnClick = Cut1Click end object HiddenCopy1: TMenuItem Caption = 'HiddenCopy' ShortCut = 16429 Visible = False OnClick = Copy1Click end object HiddenPaste1: TMenuItem Caption = 'HiddenPaste' ShortCut = 8237 Visible = False OnClick = Paste1Click end object HiddenCust11: TMenuItem Caption = 'HiddenCust1' ShortCut = 16433 Visible = False end object HiddenCust21: TMenuItem Caption = 'HiddenCust2' ShortCut = 16434 Visible = False end object HiddenCust31: TMenuItem Caption = 'HiddenCust3' ShortCut = 16435 Visible = False end object HiddenCust41: TMenuItem Caption = 'HiddenCust4' ShortCut = 16436 Visible = False end object HiddenCust51: TMenuItem Caption = 'HiddenCust5' ShortCut = 16437 Visible = False end object HiddenCust61: TMenuItem Caption = 'HiddenCust6' ShortCut = 16438 Visible = False end object HiddenCust71: TMenuItem Caption = 'HiddenCust7' ShortCut = 16439 Visible = False end object HiddenCust81: TMenuItem Caption = 'HiddenCust8' ShortCut = 16440 Visible = False end object HiddenCust91: TMenuItem Caption = 'HiddenCust9' ShortCut = 16441 Visible = False end object Delete1: TMenuItem Caption = '&Delete' Hint = 'Delete the selected text' ShortCut = 0 OnClick = Delete1Click end object SelectAll1: TMenuItem Caption = '&Select All' Hint = 'Select all the text in the editor window' ShortCut = 0 OnClick = SelectAll1Click end object N10: TMenuItem Caption = '-' ShortCut = 0 end object CheckSpelling1: TMenuItem Caption = 'Check Spe&lling...' ShortCut = 118 OnClick = CheckSpelling1Click end object Find1: TMenuItem Caption = '&Find...' Hint = 'Search for text in this file' ShortCut = 16454 OnClick = Replace1Click end object Replace1: TMenuItem Caption = '&Replace...' Hint = 'Replace text in this file' ShortCut = 0 OnClick = Replace1Click end object FindNext1: TMenuItem Caption = 'Find &Next' Hint = 'Find the next match from the previous search' ShortCut = 114 OnClick = FindNext1Click end object RemoveHTMLTags1: TMenuItem Caption = 'Re&move HTML Tags' Hint = 'Remove HTML Tags from the selected text' ShortCut = 16466 OnClick = RemoveHTMLTags1Click end object IntelligentTagInsert1: TMenuItem Caption = '&Intelligent Tag Insert...' Hint = 'Add tags to lines of the document based on specified criteria' ShortCut = 0 OnClick = IntelligentTagInsert1Click end object AutoParagraphFormat1: TMenuItem Caption = '&Auto Paragraph Format...' Hint = 'Insert tags to automatically format paragraphs for the selected ' + 'text' ShortCut = 0 OnClick = AutoParagraphFormat1Click end object ConvertEntitiestoCharacters1: TMenuItem Caption = 'Convert &Entities to Characters...' Hint = 'Convert HTML entities to the ASCII character equivalent' ShortCut = 0 OnClick = ConvertEntitiestoCharacters1Click end object ConvertCharacterstoEntities1: TMenuItem Caption = 'Convert C&haracters to Entities...' Hint = 'Convert special ASCII characters to the equivalent HTML entities' ShortCut = 0 OnClick = ConvertCharacterstoEntities1Click end end object Element1: TMenuItem Caption = 'Ele&ment' GroupIndex = 2 ShortCut = 0 object FormWiz1: TMenuItem Caption = '&Form Designer...' Hint = 'Design a fill-out form' ShortCut = 0 OnClick = FormWiz1Click end object TableWiz1: TMenuItem Caption = '&Table Designer...' Hint = 'Design an HTML table (HTML 3.0/Netscape)' ShortCut = 0 OnClick = TableWiz1Click end object TableMaker1: TMenuItem Caption = 'Table &Maker' ShortCut = 0 Visible = False OnClick = TableMaker1Click end object N9: TMenuItem Caption = '-' ShortCut = 0 end object Title1: TMenuItem Caption = 'T&itle' Hint = 'Make the selected text the title of this HTML document' ShortCut = 16468 OnClick = Title1Click end object Banner1: TMenuItem Caption = 'Banner' Hint = 'Indicate a non-scrollable Banner (HTML 3.0)' ShortCut = 0 OnClick = Banner1Click end object Division1: TMenuItem Caption = '&Division' Hint = 'Identify the selected text as a particular type of container suc' + 'h as an abstract, appendix, chapter, etc..' ShortCut = 0 OnClick = Division1Click end object Comment1: TMenuItem Caption = '&Comment' Hint = 'Make the selected text a comment' ShortCut = 0 OnClick = Comment1Click end object N12: TMenuItem Caption = '-' ShortCut = 0 end object MarkasHEAD1: TMenuItem Caption = 'H&EAD' Hint = 'Indicate that the selected text is the header of the document' ShortCut = 0 OnClick = MarkasHEAD1Click end object MarkasBODY1: TMenuItem Caption = 'B&ODY (Background and Colors)...' Hint = 'Indicate the body of the document and specify background, text, ' + 'and link colors' ShortCut = 0 OnClick = MarkasBODY1Click end object MarkasHTML1: TMenuItem Caption = 'HTM&L' Hint = 'Indicate that the selected text is HTML' ShortCut = 0 OnClick = MarkasHTML1Click end object StandardDocumentOutline1: TMenuItem Caption = '&Standard Document Outline' Hint = 'Insert HTML, HEAD, and BODY tags' ShortCut = 0 OnClick = StandardDocumentOutline1Click end object N17: TMenuItem Caption = '-' ShortCut = 0 end object InsertCurrentTime1: TMenuItem Caption = '&Insert Current Time' Hint = 'Inserts the current time in the document' ShortCut = 0 OnClick = InsertCurrentTime1Click end object Color1: TMenuItem Caption = 'Colo&r Chooser...' Hint = 'Inserts a string with the hexadecimal value of the the chosen co' + 'lor' ShortCut = 0 OnClick = Color1Click end end object Flow1: TMenuItem Caption = 'Fl&ow' GroupIndex = 3 ShortCut = 0 object HardRule1: TMenuItem Caption = 'Horizontal &Rule
' Hint = 'Insert a Horizontal Rule
tag' ShortCut = 16456 OnClick = HardRule1Click end object LineBreak1: TMenuItem Caption = 'Line &Break
' Hint = 'Insert a Line Break
tag' ShortCut = 16397 OnClick = LineBreak1Click end object Paragraph1: TMenuItem Caption = '&Paragraph

' Hint = 'Insert a Paragraph marker tag

' ShortCut = 16464 OnClick = Paragraph1Click end object EndParagraphP1: TMenuItem Caption = 'End Paragraph

' Hint = 'Insert a Paragraph End Tag

' ShortCut = 0 OnClick = EndParagraphP1Click end object N11: TMenuItem Caption = '-' ShortCut = 0 end object Center1: TMenuItem Caption = '&Center' Hint = 'Center the selected text (Netscape)' ShortCut = 16469 OnClick = Center1Click end object ParagraphContainer1: TMenuItem Caption = '

with Op&tions...' Hint = 'Insert a paragraph tag with options (HTML 3.0)' ShortCut = 0 OnClick = ParagraphContainer1Click end object HRwithOptions1: TMenuItem Caption = '


with &Options...' Hint = 'Insert a Horizontal Rule with options (HTML 3.0)' ShortCut = 0 OnClick = HRwithOptions1Click end object NoBreak1: TMenuItem Caption = '&No Break ' Hint = 'Indicate that the selected text should not be subject to a word' + ' break (Netscape)' ShortCut = 0 OnClick = NoBreak1Click end object WordBreak1: TMenuItem Caption = '&Word Break ' Hint = 'Indicate that this would be a good place to break a word (Netsca' + 'pe)' ShortCut = 0 OnClick = WordBreak1Click end end object List1: TMenuItem Caption = '&List' GroupIndex = 4 ShortCut = 0 object UnorderedList1: TMenuItem Caption = '&Unordered List ' Hint = 'Format the selected text as an unordered list' ShortCut = 0 OnClick = UnorderedList1Click end object OrdererdList1: TMenuItem Caption = '&Ordered List
    ..
' Hint = 'Format the selected text as an ordered list' ShortCut = 0 OnClick = OrdererdList1Click end object DefinitionList1: TMenuItem Caption = '&Definition List
..
' Hint = 'Format the selected text as a list of definitions' ShortCut = 0 OnClick = DefinitionList1Click end object Menu1: TMenuItem Caption = '&Menu' Hint = 'Format the selected text as a menu list' ShortCut = 0 OnClick = Menu1Click end object Directory1: TMenuItem Caption = 'D&irectory' Hint = 'Format the selected text as a directory list' ShortCut = 0 OnClick = Directory1Click end object N13: TMenuItem Caption = '-' ShortCut = 0 end object ListItem1: TMenuItem Caption = '&List Item
  • ...
  • ' Hint = 'Format the selected text as a List Item' ShortCut = 16460 OnClick = ListItem1Click end object LIwithOptions1: TMenuItem Caption = '
  • ' Hint = 'Specify a particular style of list item marker (HTML 3.0)' ShortCut = 0 object Disc1: TMenuItem Caption = 'Disc' Hint = 'List Item marker is a solid disc (HTML 3.0)' ShortCut = 0 OnClick = Disc1Click end object Circle1: TMenuItem Caption = 'Circle' Hint = 'List Item marker is a circle (HTML 3.0)' ShortCut = 0 OnClick = Circle1Click end object Square1: TMenuItem Caption = 'Square' Hint = 'List Item marker is a square (HTML 3.0)' ShortCut = 0 OnClick = Square1Click end end object ULTYPE1: TMenuItem Caption = '